home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus Special 25
/
AMIGAplus Sonderheft 25 (2000)(Falke)(DE)(Track 1 of 4)[!].iso
/
Tools
/
SFX-Player
/
Mpeg
/
MrMPEG
/
Save.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
2000-05-08
|
1KB
|
31 lines
/* Save.rexx */
options results; parse arg mode; address MrMPEG
MUIA_Cycle_Active = 0x80421788
if mode = 1 then filename = 'ENVARC:MrMPEG.prefs'
else filename = 'ENV:MrMPEG.prefs'
if open('SaveFile', filename, 'w') = 1 then do
popasl ID PATH; writeln('SaveFile', result)
popasl ID FPATH; writeln('SaveFile', result)
check ID MONO; writeln('SaveFile', result)
check ID FILT; writeln('SaveFile', result)
knob ID VOLM; writeln('SaveFile', result)
cycle ID DIVS ATTRS MUIA_Cycle_Active; writeln('SaveFile', result)
cycle ID QUAL ATTRS MUIA_Cycle_Active; writeln('SaveFile', result)
slider ID PRIO; writeln('SaveFile', result)
cycle ID MAXF ATTRS MUIA_Cycle_Active; writeln('SaveFile', result)
cycle ID MIXF ATTRS MUIA_Cycle_Active; writeln('SaveFile', result)
cycle ID REPT ATTRS MUIA_Cycle_Active; writeln('SaveFile', result)
check ID EJCT; writeln('SaveFile', result)
check ID ADVC; writeln('SaveFile', result)
check ID RAND; writeln('SaveFile', result)
cycle ID ABUF ATTRS MUIA_Cycle_Active; writeln('SaveFile', result)
cycle ID IBUF ATTRS MUIA_Cycle_Active; writeln('SaveFile', result)
check ID UAHI; writeln('SaveFile', result)
text ID AHID; writeln('SaveFile', result)
call close('SaveFile')
end
return